home *** CD-ROM | disk | FTP | other *** search
/ Zoom 2 / Zoom - Release 2 (1996)(Active Software)[!].iso / programming / amiga / muibuilder / install / install_mb < prev    next >
Encoding:
Text File  |  1995-12-05  |  14.0 KB  |  536 lines

  1. (complete 0)
  2.  
  3. (set locale 0)
  4.  
  5. ;===========================================================================
  6. ; English strings
  7.  
  8. (if (= @language "english")
  9. (
  10.  
  11. (set #bad-MUI         (cat "You need at least MUI2.2 to use MUIBuilder 2.0." ))
  12. (set #dir-choice     (cat "Select the directory where the MUIBuilder Directory will be created." ))
  13. (set #copy         (cat "Copying MUIBuilder"))
  14. (set #doc-copy         (cat "Copying Documentation"))
  15. (set #olddoc         (cat "/MB/Documentations/MUIBuilder_english.guide"))
  16. (set #olddocdvi        (cat "/MB/Documentations/MUIBuilder_english.dvi"))
  17. (set #copyENV         (cat "Copying to ENV:"))
  18. (set #copyENVARC     (cat "Copying to ENVARC:"))
  19. (set #installcatalog     (cat "\n\nDo you want to install the english catalog ?"))
  20. (set #copycatalog     (cat "Installation of the english catalogue."))
  21. (set #catalogname     (cat "/Catalogs/English/MUIBuilder.catalog"))
  22. (set #destname         (cat "Locale:Catalogs/English"))
  23. (set #genchoice        (cat "Chose the generators you need"))
  24. (set #c            (cat "C language"))
  25. (set #E            (cat "E language"))
  26. (set #Oberon        (cat "Oberon language"))
  27. (set #Modula        (cat "Modula2 language"))
  28. (set #Assembly        (cat "Assembly language"))
  29. (set #libcopy        (cat "Copying muibuilder.library to LIBS:"))
  30.  
  31. ))
  32.  
  33. ;===========================================================================
  34. ; French strings
  35.  
  36. (if (= @language "français")
  37. (
  38. (set locale 1)
  39.  
  40. (set #bad-MUI         (cat "Vous avez besoin au moins de MUI2.2 pour utiliser MUIBuilder 2.0." ))
  41. (set #dir-choice     (cat "Sélectionnez le répertoire dans lequel vous voulez installer le répertoire de MUIBuider." ))
  42. (set #copy         (cat "Copie de MUIBuilder"))
  43. (set #doc-copy         (cat "Copie de la Documentation"))
  44. (set #olddoc         (cat "/MB/Documentations/MUIBuilder_Français.guide"))
  45. (set #olddocdvi     (cat "/MB/Documentations/MUIBuilder_Français.dvi"))
  46. (set #copyENV         (cat "Copie des variables d'environnement dans ENV:"))
  47. (set #copyENVARC     (cat "Copie des variables d'environnement dans ENVARC:"))
  48. (set #installcatalog     (cat "\n\nVoulez vous installer le catalogue Français ?"))
  49. (set #copycatalog     (cat "Installation du catalogue Français."))
  50. (set #catalogname     (cat "/Catalogs/Français/MUIBuilder.catalog"))
  51. (set #destname         (cat "Locale:Catalogs/Français"))
  52. (set #genchoice        (cat "Choisissez les modules externes dont vous avez besoin"))
  53. (set #c            (cat "Langage C"))
  54. (set #E            (cat "Langage E"))
  55. (set #Oberon        (cat "Langage Oberon"))
  56. (set #Modula        (cat "Langage Modula2"))
  57. (set #Assembly        (cat "Langage Assembleur"))
  58. (set #libcopy        (cat "Copie de la muibuilder.library vers LIBS:"))
  59.  
  60. ))
  61.  
  62. ;===========================================================================
  63. ; German strings
  64.  
  65. (if (= @language "deutsch")
  66. (
  67. (set locale 2)
  68.  
  69. (set #bad-MUI         (cat "Sie benötigen mindestens MUI2.2, um MUIBuilder 2.0 zu nutzen."))
  70. (set #dir-choice     (cat "Wählen Sie das Verzeichnis aus, in welches das Verzeichnis von MUIBuilderV1.1 installiert wird."))
  71. (set #copy         (cat "Kopiere MUIBuilder"))
  72. (set #doc-copy         (cat "Kopiere Dokumentation"))
  73. (set #olddoc         (cat "/MB/Documentations/MUIBuilder_Deutsch.guide"))
  74. (set #olddocdvi     (cat "/MB/Documentations/MUIBuilder_Deutsch.dvi"))
  75. (set #copyENV         (cat "Kopiere nach ENV:"))
  76. (set #copyENVARC     (cat "Kopiere nach ENVARC:"))
  77. (set #installcatalog     (cat "\n\nSoll der deutsche Catalog installiert werden?"))
  78. (set #copycatalog     (cat "Installiere deutschen Catalog." ))
  79. (set #catalogname     (cat "/Catalogs/Deutsch/MUIBuilder.catalog"))
  80. (set #destname         (cat "Locale:Catalogs/Deutsch"))
  81. (set #genchoice        (cat "Wählen Sie die Modulen aus, die Sie wollen"))
  82. (set #c            (cat "C Sprache"))
  83. (set #E            (cat "E Sprache"))
  84. (set #Oberon        (cat "Oberon Sprache"))
  85. (set #Modula        (cat "Modula2 Sprache"))
  86. (set #Assembly        (cat "Assembly Sprache"))
  87. (set #libcopy        (cat "Kopiere muibuilder.library nach LIBS:"))
  88.  
  89. ))
  90.  
  91. ;===========================================================================
  92. ; Czech strings
  93.  
  94. (if (= @language "czech")
  95. (
  96. (set locale 3)
  97.  
  98. (set #bad-MUI         (cat "MUIBuilder 2.0 vyùaduje MUI2.2 !" ))
  99. (set #dir-choice     (cat "Zvolte adresáê, ve kterém chcete vytvoêit adresáê pro MUIBuilder." ))
  100. (set #copy         (cat "Kopíruji MUIBuilder"))
  101. (set #doc-copy         (cat "Kopíruji Dokumentaci"))
  102. (set #olddoc         (cat "/MB/Documentations/MUIBuilder_english.guide"))
  103. (set #olddocdvi     (cat "/MB/Documentations/MUIBuilder_english.dvi"))
  104. (set #copyENV         (cat "Kopíruji do ENV:"))
  105. (set #copyENVARC     (cat "Kopíruji do ENVARC:"))
  106. (set #installcatalog     (cat "\n\nChcete nainstalovat çeský katalog?"))
  107. (set #copycatalog     (cat "Instaluji çeský katalog."))
  108. (set #catalogname     (cat "/Catalogs/Czech/MUIBuilder.catalog"))
  109. (set #destname         (cat "Locale:Catalogs/Czech"))
  110. (set #genchoice        (cat "Zvolte generátory, které si pêejete nainstalovat"))
  111. (set #c            (cat "Jazyk C"))
  112. (set #E            (cat "Jazyk E"))
  113. (set #Oberon        (cat "Jazik Oberon"))
  114. (set #Modula        (cat "Jazik Modula2"))
  115. (set #Assembly        (cat "Assembler"))
  116. (set #libcopy        (cat "Kopíruji muibuilder.library do LIBS:"))
  117.  
  118. ))
  119.  
  120. ;=============================================================================
  121. ; Español strings
  122.  
  123. (if (= @language "español")
  124. (
  125. (set locale 0)
  126.  
  127. (set #bad-MUI         (cat "Necesitas al menos MUI2.2 para usar MUIBuilder 2.0." ))
  128. (set #dir-choice     (cat "Elige el Directorio donde quieres instalar MUIBuilder." ))
  129. (set #copy         (cat "Copiando MUIBuilder"))
  130. (set #doc-copy         (cat "Copiando Documentación"))
  131. (set #olddoc         (cat "/MB/Documentations/MUIBuilder_english.guide"))
  132. (set #olddocdvi     (cat "/MB/Documentations/MUIBuilder_english.dvi"))
  133. (set #copyENV         (cat "Copiando a ENV:"))
  134. (set #copyENVARC     (cat "Copiando a ENVARC:"))
  135. (set #installcatalog     (cat "\n\nQuieres instalar el catálogo español ?"))
  136. (set #copycatalog     (cat "Instalación del catálogo español."))
  137. (set #catalogname     (cat "/Catalogs/Español/MUIBuilder.catalog"))
  138. (set #destname         (cat "Locale:Catalogs/Español"))
  139. (set #genchoice        (cat "Elige los módulos externos que necesites"))
  140. (set #c            (cat "Lenguaje C"))
  141. (set #E            (cat "Lenguaje E"))
  142. (set #Oberon        (cat "Lenguaje Oberon"))
  143. (set #Modula        (cat "Lenguaje Modula2"))
  144. (set #Assembly        (cat "Lenguaje Ensamblador"))
  145. (set #libcopy        (cat "Copiando muibuilder.library a LIBS:"))
  146.  
  147. ))
  148.  
  149. ;===========================================================================
  150. ; Polish strings - Marcin Orîowski
  151.  
  152. (if (= @language "polski")
  153. (
  154. (set locale 0)
  155.  
  156. (set #bad-MUI         (cat "Potrzebujesz co najmniej MUI2.2 aby uûyê MUIBuildera 2.0." ))
  157. (set #dir-choice     (cat "Wybierz katalog docelowy, w ktorym zostanie zaîoûony katalog MUIBuilder." ))
  158. (set #copy         (cat "Co chcesz zainstalowaê?"))
  159. (set #doc-copy         (cat "Instalujë dokumentacjë"))
  160. (set #olddoc         (cat "/MB/Documentations/MUIBuilder_english.guide"))
  161. (set #olddocdvi        (cat "/MB/Documentations/MUIBuilder_english.dvi"))
  162. (set #copyENV         (cat "Kopiujë do katalogu ENV:"))
  163. (set #copyENVARC     (cat "Kopiujë do katalogu ENVARC:"))
  164. (set #installcatalog     (cat "\n\nCzy chcesz zainstalowaê polski katalog (plik jëzykowy)?"))
  165. (set #copycatalog     (cat "Instalujë polski katalog."))
  166. (set #catalogname     (cat "/Catalogs/Polski/MUIBuilder.catalog"))
  167. (set #destname         (cat "Locale:Catalogs/polski"))
  168. (set #genchoice        (cat "Wybierz generatory tekstów úródîowych"))
  169. (set #c            (cat "Jëzyk C"))
  170. (set #E            (cat "Jëzyk E"))
  171. (set #Oberon        (cat "Oberon"))
  172. (set #Modula        (cat "Modula2"))
  173. (set #Assembly        (cat "Assembler"))
  174. (set #libcopy        (cat "Kopiujë muibuilder.library do katalogu LIBS:"))
  175.  
  176. ))
  177.  
  178. ;===========================================================================
  179. ; Italian strings
  180.  
  181. (if (= @language "italiano")
  182. (
  183. (set locale 6)
  184.  
  185. (set #bad-MUI         (cat "You need at least MUI2.2 to use MUIBuilder 2.0." ))
  186. (set #dir-choice     (cat "Select the directory where the MUIBuilder Directory will be created." ))
  187. (set #copy         (cat "Copying MUIBuilder"))
  188. (set #doc-copy         (cat "Copying Documentation"))
  189. (set #olddoc         (cat "/MB/Documentations/MUIBuilder_english.guide"))
  190. (set #olddocdvi        (cat "/MB/Documentations/MUIBuilder_english.dvi"))
  191. (set #copyENV         (cat "Copying to ENV:"))
  192. (set #copyENVARC     (cat "Copying to ENVARC:"))
  193. (set #installcatalog     (cat "\n\nDo you want to install the english catalog ?"))
  194. (set #copycatalog     (cat "Installation of the english catalogue."))
  195. (set #catalogname     (cat "/Catalogs/English/MUIBuilder.catalog"))
  196. (set #destname         (cat "Locale:Catalogs/English"))
  197. (set #genchoice        (cat "Chose the generators you need"))
  198. (set #c            (cat "C language"))
  199. (set #E            (cat "E language"))
  200. (set #Oberon        (cat "Oberon language"))
  201. (set #Modula        (cat "Modula2 language"))
  202. (set #Assembly        (cat "Assembly language"))
  203. (set #libcopy        (cat "Copying muibuilder.library to LIBS:"))
  204.  
  205. ))
  206.  
  207. ;===========================================================================
  208. ; Dansk strings
  209.  
  210. (if (= @language "Dansk")
  211. (
  212. (set locale 7)
  213.  
  214. (set #bad-MUI         (cat "You need at least MUI2.2 to use MUIBuilder 2.0." ))
  215. (set #dir-choice     (cat "Select the directory where the MUIBuilder Directory will be created." ))
  216. (set #copy         (cat "Copying MUIBuilder"))
  217. (set #doc-copy         (cat "Copying Documentation"))
  218. (set #olddoc         (cat "/MB/Documentations/MUIBuilder_english.guide"))
  219. (set #olddocdvi        (cat "/MB/Documentations/MUIBuilder_english.dvi"))
  220. (set #copyENV         (cat "Copying to ENV:"))
  221. (set #copyENVARC     (cat "Copying to ENVARC:"))
  222. (set #installcatalog     (cat "\n\nDo you want to install the english catalog ?"))
  223. (set #copycatalog     (cat "Installation of the english catalogue."))
  224. (set #catalogname     (cat "/Catalogs/Dansk/MUIBuilder.catalog"))
  225. (set #destname         (cat "Locale:Catalogs/Dansk"))
  226. (set #genchoice        (cat "Chose the generators you need"))
  227. (set #c            (cat "C language"))
  228. (set #E            (cat "E language"))
  229. (set #Oberon        (cat "Oberon language"))
  230. (set #Modula        (cat "Modula2 language"))
  231. (set #Assembly        (cat "Assembly language"))
  232. (set #libcopy        (cat "Copying muibuilder.library to LIBS:"))
  233.  
  234. ))
  235.  
  236. ;=============================================================================
  237. ;=============================================================================
  238. ; Installation procedure
  239.  
  240. ( set MBdir "Ram:" )
  241.  
  242. ;========================================================================
  243. ;
  244. ; Scanning MUI version
  245. ;
  246.  
  247. ( set versionnumber (getversion "LIBS:muimaster.library" ) )
  248. ( set version (/ versionnumber 65536))
  249.  
  250. ( if (< version 8)
  251.     (
  252.         (if (= locale 0)
  253.                 ( abort #bad-MUI )
  254.         )
  255.     )
  256. )
  257.  
  258. ;========================================================================
  259. ;
  260. ; Select the MUIBuilder directory
  261. ;
  262.  
  263. (set MBdir
  264.     ( askdir
  265.         ( prompt #dir-choice )
  266.         (help "")
  267.         (default "Sys:")
  268.         (newpath)
  269.     )
  270. )
  271.  
  272. ;========================================================================
  273. ;
  274. ; Copying MUIBuilder
  275. ;
  276.  
  277. (complete 10)
  278.  
  279. (set @default-dest MBdir )
  280. (set MBdir ( tackon MBdir "MUIBuilder" ) )
  281.  
  282. (copyfiles
  283.     (prompt #copy)
  284.     (source "/MB")
  285.     (help   @copyfiles-help)
  286.     (infos)
  287.     (dest MBdir)
  288.     (choices "MUIBuilder"
  289.          "BuilderSave"
  290.          "Tools"
  291.          "Catalogs"
  292.          "Developer"
  293.          "Images"
  294.     )
  295.     (confirm)
  296. )
  297.  
  298. (copyfiles
  299.     (source "/MB.info")
  300.     (help    @copyfiles-help)
  301.     (dest     @default-dest)
  302.     (newname (cat MBdir ".info"))
  303. )
  304.  
  305. (complete 20)
  306.  
  307. ;========================================================================
  308. ;
  309. ; Copying muibuilder.library
  310. ;
  311.  
  312.  
  313. (copylib
  314.     (source    "/Libs/muibuilder.library")
  315.     (dest "LIBS:")
  316.     (prompt #libcopy)
  317.     (help @copylib-help)
  318.     (confirm)
  319. )
  320.  
  321. (complete 30)
  322.  
  323. ;========================================================================
  324. ;
  325. ; Copying textfield.gadget
  326. ;
  327.  
  328.  
  329. (copylib
  330.     (source    "/Classes/textfield.gadget")
  331.     (dest "SYS:Classes/Gadgets/")
  332.     (prompt #libcopy)
  333.     (help @copylib-help)
  334.     (confirm)
  335. )
  336.  
  337. (complete 40)
  338.  
  339. ;========================================================================
  340. ;
  341. ; Copying Modules
  342.  
  343. (set modules
  344.     (askoptions
  345.         (prompt     #genchoice)
  346.         (help     @askoptions-help)
  347.         (choices #C
  348.              #E
  349.              #Oberon
  350.              #Modula
  351.              #Assembly
  352.         )
  353.         (default 31)
  354.     )
  355. )
  356.  
  357. ;======================
  358. ; Copying GenCodeC
  359. ;
  360. (if (IN modules 0)
  361.     (
  362.         (copyfiles
  363.             (source "/MB/Modules")
  364.             (dest (tackon MBdir "Modules"))
  365.             (choices "GenCodeC" "C-Header" "H-Header"
  366.                  "GenCodeGCC" "C++-Header" "H++-Header")
  367.         )
  368.         (copyfiles
  369.             (source "/MB")
  370.             (dest MBdir)
  371.             (choices "C" "GCC")
  372.             (infos)
  373.         )
  374.     )
  375. )    
  376.  
  377. ;======================
  378. ; Copying GenCodeE
  379. ;
  380. (if (IN modules 1)
  381.     (
  382.         (copyfiles
  383.             (source "/MB/Modules")
  384.             (dest (tackon MBdir "Modules"))
  385.             (choices "GenCodeE30b+" "GenCodeE31a+")
  386.         )
  387.         (copyfiles
  388.             (infos)
  389.             (source "/MB")
  390.             (dest MBdir)
  391.             (choices "E")
  392.         )
  393.     )
  394. )
  395.  
  396. ;======================
  397. ; Copying GenCodeOberon
  398. ;
  399. (if (IN modules 2)
  400.     (
  401.         (copyfiles
  402.             (source "/MB/Modules")
  403.             (dest (tackon MBdir "Modules"))
  404.             (choices "GenCodeOberon")
  405.         )
  406.         (copyfiles
  407.             (infos)
  408.             (source "/MB")
  409.             (dest MBdir)
  410.             (choices "Oberon")
  411.         )
  412.     )
  413. )
  414.  
  415. ;======================
  416. ; Copying GenCodeModula
  417. ;
  418. (if (IN modules 3)
  419.     (
  420.         (copyfiles
  421.             (source "/MB/Modules")
  422.             (dest (tackon MBdir "Modules"))
  423.             (choices "GenCodeM2")
  424.         )
  425.         (copyfiles
  426.             (infos)
  427.             (source "/MB")
  428.             (dest MBdir)
  429.             (choices "M2")
  430.         )
  431.     )
  432. )
  433.  
  434. ;======================
  435. ; Copying GenCodeASM
  436. ;
  437. (if (IN modules 4)
  438.     (
  439.         (copyfiles
  440.             (source "/MB/Modules")
  441.             (dest (tackon MBdir "Modules"))
  442.             (choices "GenCodeASM")
  443.         )
  444.         (copyfiles
  445.             (infos)
  446.             (source "/MB")
  447.             (dest MBdir)
  448.             (choices "ASM")
  449.         )
  450.     )
  451. )
  452.  
  453. (complete 60)
  454.  
  455. ;========================================================================
  456. ;
  457. ; Copying documentation
  458. ;
  459.  
  460. ( set MBdoc ( tackon MBdir "Documentations" ) )
  461.  
  462. (copyfiles
  463.     (prompt #doc-copy)
  464.     (source #olddoc)
  465.     (newname "MUIBuilder.guide")
  466.     (help @copyfiles-help)
  467.         (infos)
  468.     (confirm)
  469.         (dest MBdoc )
  470. )
  471.  
  472. (copyfiles
  473.     (source "/MB/Documentations.info")
  474.     (newname (cat MBdoc ".info"))
  475.     (dest @default-dest)
  476. )
  477.  
  478. (copyfiles
  479.     (prompt #doc-copy)
  480.     (source #olddocdvi)
  481.     (newname "MUIBuilder.dvi")
  482.     (help @copyfiles-help)
  483.         (infos)
  484.     (confirm)
  485.         (dest MBdoc )
  486. )
  487.  
  488. ;========================================================================
  489. ;
  490. ; copying MUIBuilder.catalog files
  491. ;
  492.  
  493. (complete 70)
  494.  
  495. (if (> locale 0)
  496.     (if     (askbool
  497.         (prompt #installcatalog)
  498.         (help   "")
  499.         )
  500.         (copylib
  501.             (prompt #copycatalog)
  502.             (source #catalogname)
  503.             (dest   #destname)
  504.             (help   @copylib-help)
  505.             (confirm)
  506.         )
  507.     )
  508. )
  509.  
  510. ;=========================================================================
  511. ;
  512. ; Copying environment variables
  513. ;
  514.  
  515. (complete 80)
  516.  
  517. (copyfiles
  518.     (prompt #copyENV)
  519.     (source "/Env")
  520.     (dest   "ENV:")
  521.     (all)
  522. )
  523.  
  524. (copyfiles
  525.     (prompt #copyENVARC)
  526.     (source "/Env")
  527.     (dest   "ENVARC:")
  528.     (help   @copyfiles-help)
  529.     (confirm)
  530.     (all)
  531. )
  532.  
  533. (complete 99)
  534.  
  535. (exit)
  536.